projects
/
emacs.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
19c277d
)
(make-doctor-variables): Eliminate `observation-list' also.
author
Richard M. Stallman
<rms@gnu.org>
Sat, 31 Aug 1996 22:24:46 +0000
(22:24 +0000)
committer
Richard M. Stallman
<rms@gnu.org>
Sat, 31 Aug 1996 22:24:46 +0000
(22:24 +0000)
lisp/play/doctor.el
patch
|
blob
|
history
diff --git
a/lisp/play/doctor.el
b/lisp/play/doctor.el
index 8b68c9447c9038ae5231e6a18dfaa04cfbecfc4c..faba5e1cf2638ae302549d92c4a4c44308b78bd4 100644
(file)
--- a/
lisp/play/doctor.el
+++ b/
lisp/play/doctor.el
@@
-529,8
+529,6
@@
reads the sentence before point, and prints the Doctor's answer."
(setq obj nil)
(make-local-variable 'feared)
(setq feared nil)
- (make-local-variable 'observation-list)
- (setq observation-list nil)
(make-local-variable 'repetitive-shortness)
(setq repetitive-shortness '(0 . 0))
(make-local-variable '**mad**)
@@
-1466,7
+1464,6
@@
Hack on previous word, setting global variable OWNER to correct result."
(t
(doctor-type '(i give up \. you need a lesson in creative
writing \.\.\.))
- ;;(push monosyllables observation-list)
)))
(t
(cond ((equal sent (doctor-assm '(yes)))